home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / E-G / Financial Portfolio v1.8.cpt / Financial Portfolio v1.8 / background_22997.xml < prev    next >
Extensible Markup Language  |  1991-09-30  |  11KB  |  332 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>22997</id>
  5.     <filler1>0</filler1>
  6.     <bitmap>BMAP_25912.pbm</bitmap>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_3246.css" />
  11.     <part>
  12.         <id>1</id>
  13.         <type>field</type>
  14.         <visible> <true /> </visible>
  15.         <dontWrap> <false /> </dontWrap>
  16.         <dontSearch> <false /> </dontSearch>
  17.         <sharedText> <false /> </sharedText>
  18.         <fixedLineHeight> <false /> </fixedLineHeight>
  19.         <autoTab> <false /> </autoTab>
  20.         <lockText> <true /> </lockText>
  21.         <rect>
  22.             <left>135</left>
  23.             <top>41</top>
  24.             <right>425</right>
  25.             <bottom>60</bottom>
  26.         </rect>
  27.         <style>rectangle</style>
  28.         <autoSelect> <false /> </autoSelect>
  29.         <showLines> <false /> </showLines>
  30.         <wideMargins> <false /> </wideMargins>
  31.         <multipleLines> <false /> </multipleLines>
  32.         <reservedFamily> 0 </reservedFamily>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>0</icon>
  35.         <textAlign>center</textAlign>
  36.         <font>Chicago</font>
  37.         <textSize>12</textSize>
  38.         <textStyle>plain</textStyle>
  39.         <textHeight>16</textHeight>
  40.         <name>Stock</name>
  41.         <script></script>
  42.     </part>
  43.     <part>
  44.         <id>2</id>
  45.         <type>field</type>
  46.         <visible> <true /> </visible>
  47.         <dontWrap> <false /> </dontWrap>
  48.         <dontSearch> <false /> </dontSearch>
  49.         <sharedText> <false /> </sharedText>
  50.         <fixedLineHeight> <false /> </fixedLineHeight>
  51.         <autoTab> <false /> </autoTab>
  52.         <lockText> <true /> </lockText>
  53.         <rect>
  54.             <left>71</left>
  55.             <top>41</top>
  56.             <right>119</right>
  57.             <bottom>60</bottom>
  58.         </rect>
  59.         <style>rectangle</style>
  60.         <autoSelect> <false /> </autoSelect>
  61.         <showLines> <false /> </showLines>
  62.         <wideMargins> <false /> </wideMargins>
  63.         <multipleLines> <false /> </multipleLines>
  64.         <reservedFamily> 0 </reservedFamily>
  65.         <titleWidth>0</titleWidth>
  66.         <icon>0</icon>
  67.         <textAlign>center</textAlign>
  68.         <font>Geneva</font>
  69.         <textSize>12</textSize>
  70.         <textStyle>plain</textStyle>
  71.         <textHeight>16</textHeight>
  72.         <name>type</name>
  73.         <script></script>
  74.     </part>
  75.     <part>
  76.         <id>3</id>
  77.         <type>field</type>
  78.         <visible> <true /> </visible>
  79.         <dontWrap> <false /> </dontWrap>
  80.         <dontSearch> <false /> </dontSearch>
  81.         <sharedText> <false /> </sharedText>
  82.         <fixedLineHeight> <true /> </fixedLineHeight>
  83.         <autoTab> <false /> </autoTab>
  84.         <lockText> <true /> </lockText>
  85.         <rect>
  86.             <left>248</left>
  87.             <top>79</top>
  88.             <right>296</right>
  89.             <bottom>99</bottom>
  90.         </rect>
  91.         <style>opaque</style>
  92.         <autoSelect> <false /> </autoSelect>
  93.         <showLines> <false /> </showLines>
  94.         <wideMargins> <false /> </wideMargins>
  95.         <multipleLines> <false /> </multipleLines>
  96.         <reservedFamily> 0 </reservedFamily>
  97.         <titleWidth>0</titleWidth>
  98.         <icon>0</icon>
  99.         <textAlign>left</textAlign>
  100.         <font>Chicago</font>
  101.         <textSize>12</textSize>
  102.         <textStyle>plain</textStyle>
  103.         <textHeight>18</textHeight>
  104.         <name>shares</name>
  105.         <script></script>
  106.     </part>
  107.     <part>
  108.         <id>6</id>
  109.         <type>field</type>
  110.         <visible> <true /> </visible>
  111.         <dontWrap> <false /> </dontWrap>
  112.         <dontSearch> <true /> </dontSearch>
  113.         <sharedText> <false /> </sharedText>
  114.         <fixedLineHeight> <true /> </fixedLineHeight>
  115.         <autoTab> <false /> </autoTab>
  116.         <lockText> <false /> </lockText>
  117.         <rect>
  118.             <left>149</left>
  119.             <top>241</top>
  120.             <right>178</right>
  121.             <bottom>261</bottom>
  122.         </rect>
  123.         <style>rectangle</style>
  124.         <autoSelect> <false /> </autoSelect>
  125.         <showLines> <false /> </showLines>
  126.         <wideMargins> <false /> </wideMargins>
  127.         <multipleLines> <false /> </multipleLines>
  128.         <reservedFamily> 0 </reservedFamily>
  129.         <titleWidth>0</titleWidth>
  130.         <icon>0</icon>
  131.         <textAlign>center</textAlign>
  132.         <font>Chicago</font>
  133.         <textSize>12</textSize>
  134.         <textStyle>plain</textStyle>
  135.         <textHeight>17</textHeight>
  136.         <name>presplit</name>
  137.         <script></script>
  138.     </part>
  139.     <part>
  140.         <id>7</id>
  141.         <type>field</type>
  142.         <visible> <true /> </visible>
  143.         <dontWrap> <false /> </dontWrap>
  144.         <dontSearch> <true /> </dontSearch>
  145.         <sharedText> <false /> </sharedText>
  146.         <fixedLineHeight> <true /> </fixedLineHeight>
  147.         <autoTab> <false /> </autoTab>
  148.         <lockText> <false /> </lockText>
  149.         <rect>
  150.             <left>208</left>
  151.             <top>241</top>
  152.             <right>237</right>
  153.             <bottom>261</bottom>
  154.         </rect>
  155.         <style>rectangle</style>
  156.         <autoSelect> <false /> </autoSelect>
  157.         <showLines> <false /> </showLines>
  158.         <wideMargins> <false /> </wideMargins>
  159.         <multipleLines> <false /> </multipleLines>
  160.         <reservedFamily> 0 </reservedFamily>
  161.         <titleWidth>0</titleWidth>
  162.         <icon>0</icon>
  163.         <textAlign>center</textAlign>
  164.         <font>Chicago</font>
  165.         <textSize>12</textSize>
  166.         <textStyle>plain</textStyle>
  167.         <textHeight>17</textHeight>
  168.         <name>postsplit</name>
  169.         <script></script>
  170.     </part>
  171.     <part>
  172.         <id>8</id>
  173.         <type>field</type>
  174.         <visible> <true /> </visible>
  175.         <dontWrap> <false /> </dontWrap>
  176.         <dontSearch> <true /> </dontSearch>
  177.         <sharedText> <false /> </sharedText>
  178.         <fixedLineHeight> <false /> </fixedLineHeight>
  179.         <autoTab> <false /> </autoTab>
  180.         <lockText> <true /> </lockText>
  181.         <rect>
  182.             <left>92</left>
  183.             <top>199</top>
  184.             <right>305</right>
  185.             <bottom>235</bottom>
  186.         </rect>
  187.         <style>transparent</style>
  188.         <autoSelect> <false /> </autoSelect>
  189.         <showLines> <false /> </showLines>
  190.         <wideMargins> <false /> </wideMargins>
  191.         <multipleLines> <false /> </multipleLines>
  192.         <reservedFamily> 0 </reservedFamily>
  193.         <titleWidth>0</titleWidth>
  194.         <icon>0</icon>
  195.         <textAlign>center</textAlign>
  196.         <font>Geneva</font>
  197.         <textSize>12</textSize>
  198.         <textStyle>plain</textStyle>
  199.         <textHeight>16</textHeight>
  200.         <name>instr2</name>
  201.         <script></script>
  202.     </part>
  203.     <part>
  204.         <id>9</id>
  205.         <type>button</type>
  206.         <visible> <true /> </visible>
  207.         <reserved5> 0 </reserved5>
  208.         <reserved4> 0 </reserved4>
  209.         <reserved3> 0 </reserved3>
  210.         <reserved2> 0 </reserved2>
  211.         <reserved1> 0 </reserved1>
  212.         <enabled> <true /> </enabled>
  213.         <rect>
  214.             <left>336</left>
  215.             <top>225</top>
  216.             <right>444</right>
  217.             <bottom>274</bottom>
  218.         </rect>
  219.         <style>roundrect</style>
  220.         <showName> <true /> </showName>
  221.         <highlight> <false /> </highlight>
  222.         <autoHighlight> <true /> </autoHighlight>
  223.         <sharedHighlight> <false /> </sharedHighlight>
  224.         <family>0</family>
  225.         <titleWidth>0</titleWidth>
  226.         <icon>0</icon>
  227.         <textAlign>center</textAlign>
  228.         <font>Chicago</font>
  229.         <textSize>12</textSize>
  230.         <textStyle>plain</textStyle>
  231.         <name>Okay</name>
  232.         <script>on mouseUpset cursor to busyif field "presplit" is empty thenfillinexit mouseUpend ifif field "postsplit" is empty thenfillinexit mouseUpend ifglobal transline,transcardput field stock into stockerput field "presplit" into preput field "postsplit" into postput field shares into sharesput field "date" into dateput round((shares*pre/post)) into newsharesset the numberformat to "0."add 0 to newsharesput field "preprice" into oldpriceput (oldprice*shares/(shares+newshares)) into newpriceset the numberformat to "0.000"add 0 to newprice -- to format itput date&":"&return&return&stocker&" split "&pre&" for "&post into qqput return&return&"This gives you "&newshares&" new shares with a new share price of "&newprice&"." after qqanswer qq with "cancel" or "Okay"if it is "cancel" or it is empty thenanswer "Quit the split or stay and make corrections?" with "quit split" or "Stay"if it is "Stay" or it is empty then exit mouseUpif it is "quit split" thenvisual barn door closego transcardexit mouseUpend ifend ifvisual barn door closego transcardput newprice into field "currprice"put date into line (transline +1) of field "date"put "Split" into line (transline +1) of field "type"set the numberformat to "0."add 0 to newshares -- format it without decimalsput newshares into line (transline +1) of field "shares"put return into line (transline +1) of field "value"put return into line (transline +1) of field "comm"put return into line (transline +1) of field "price"countshareslock screen-- first enter new price on stockport card, then let it do its thing to update infoset lockmessages to truego cd stockport -- to update new data after splitrepeat with x=1 to the number of lines of field stockif line x of field stock is stocker then put newprice into line x of field priceend repeatsend openCard to cd stockport -- calculate stuffgo transcardend mouseUpon fillinbeepanswer "Please completely fill in type of split!"end fillin</script>
  233.     </part>
  234.     <part>
  235.         <id>10</id>
  236.         <type>button</type>
  237.         <visible> <true /> </visible>
  238.         <reserved5> 0 </reserved5>
  239.         <reserved4> 0 </reserved4>
  240.         <reserved3> 0 </reserved3>
  241.         <reserved2> 0 </reserved2>
  242.         <reserved1> 0 </reserved1>
  243.         <enabled> <true /> </enabled>
  244.         <rect>
  245.             <left>349</left>
  246.             <top>156</top>
  247.             <right>423</right>
  248.             <bottom>175</bottom>
  249.         </rect>
  250.         <style>roundrect</style>
  251.         <showName> <true /> </showName>
  252.         <highlight> <false /> </highlight>
  253.         <autoHighlight> <true /> </autoHighlight>
  254.         <sharedHighlight> <false /> </sharedHighlight>
  255.         <family>0</family>
  256.         <titleWidth>0</titleWidth>
  257.         <icon>0</icon>
  258.         <textAlign>center</textAlign>
  259.         <font>Chicago</font>
  260.         <textSize>12</textSize>
  261.         <textStyle>plain</textStyle>
  262.         <name>cancel</name>
  263.         <script>on mouseUpglobal transcardvisual barn door closeput empty into field "date"put empty into field presplitput empty into field postsplitput empty into field "stock"put empty into field "shares"go transcardend mouseUp</script>
  264.     </part>
  265.     <part>
  266.         <id>12</id>
  267.         <type>field</type>
  268.         <visible> <true /> </visible>
  269.         <dontWrap> <false /> </dontWrap>
  270.         <dontSearch> <false /> </dontSearch>
  271.         <sharedText> <false /> </sharedText>
  272.         <fixedLineHeight> <true /> </fixedLineHeight>
  273.         <autoTab> <false /> </autoTab>
  274.         <lockText> <false /> </lockText>
  275.         <rect>
  276.             <left>213</left>
  277.             <top>149</top>
  278.             <right>293</right>
  279.             <bottom>174</bottom>
  280.         </rect>
  281.         <style>rectangle</style>
  282.         <autoSelect> <false /> </autoSelect>
  283.         <showLines> <false /> </showLines>
  284.         <wideMargins> <false /> </wideMargins>
  285.         <multipleLines> <false /> </multipleLines>
  286.         <reservedFamily> 0 </reservedFamily>
  287.         <titleWidth>0</titleWidth>
  288.         <icon>0</icon>
  289.         <textAlign>center</textAlign>
  290.         <font>Chicago</font>
  291.         <textSize>12</textSize>
  292.         <textStyle>plain</textStyle>
  293.         <textHeight>20</textHeight>
  294.         <name>date</name>
  295.         <script></script>
  296.     </part>
  297.     <part>
  298.         <id>13</id>
  299.         <type>field</type>
  300.         <visible> <true /> </visible>
  301.         <dontWrap> <false /> </dontWrap>
  302.         <dontSearch> <false /> </dontSearch>
  303.         <sharedText> <false /> </sharedText>
  304.         <fixedLineHeight> <true /> </fixedLineHeight>
  305.         <autoTab> <false /> </autoTab>
  306.         <lockText> <false /> </lockText>
  307.         <rect>
  308.             <left>248</left>
  309.             <top>106</top>
  310.             <right>323</right>
  311.             <bottom>126</bottom>
  312.         </rect>
  313.         <style>rectangle</style>
  314.         <autoSelect> <false /> </autoSelect>
  315.         <showLines> <false /> </showLines>
  316.         <wideMargins> <false /> </wideMargins>
  317.         <multipleLines> <false /> </multipleLines>
  318.         <reservedFamily> 0 </reservedFamily>
  319.         <titleWidth>0</titleWidth>
  320.         <icon>0</icon>
  321.         <textAlign>left</textAlign>
  322.         <font>Chicago</font>
  323.         <textSize>12</textSize>
  324.         <textStyle>plain</textStyle>
  325.         <textHeight>18</textHeight>
  326.         <name>preprice</name>
  327.         <script>on closeFieldif field "shares" is empty then exit closeFieldput me into priceif first char of price is "$" then put empty into first char of priceset the numberformat to "0.000"add 0 to price -- to set numberformatput price into meend closeField</script>
  328.     </part>
  329.     <name></name>
  330.     <script></script>
  331. </background>
  332.